home *** CD-ROM | disk | FTP | other *** search
/ KimStacks 7 / KimStacks CD-ROM 7 1993.iso / ShareWare / Games / Core! 1.1 / Battle Programs / contest87 / JR-26-8192 < prev    next >
Encoding:
Text File  |  1989-07-18  |  590 b   |  26 lines
  1. ;
  2. ;    JR-26-8192    BY K.SATOU M
  3. ; /JAPAN ENTRY
  4. ;
  5. COPY    MOV    @SPTR    <DPTR
  6.     DJN    COPY    SPTR
  7. DPTR    DAT    0,#4115             ;#(4096+19)
  8. SPTR    DAT    0,#17
  9. BOMB2    DAT    0,#0
  10. START    SPL    4096,0
  11. LOOP1    MOV    BOMB1    <ADR1
  12.     JMN    LOOP1    STOPPER
  13.     MOV    BOMB2    START     ;(BOMB2+1)
  14.     MOV    #1    4106      ;(STOPPER+4096)
  15. LOOP2    MOV    BOMB1    <ADR2
  16.     JMN    LOOP2    4104      ;(STOPPER+4096)
  17.     MOV    BOMB2    BOMB1
  18.     MOV    #1    STOPPER
  19.     MOV    #4066 ADR1       ;#(4096-32+2),ADR1
  20.     MOV    #8161 ADR2       ;#(8192-32+1),ADR2
  21.     JMP    LOOP1,0
  22. ADR1    DAT    0,#4082             ;#(4096-16+2)
  23. ADR2    DAT    0,#8161             ;#(8192-32+1)
  24. STOPPER    DAT    0,#1
  25. BOMB1    SPL    0,0
  26. END    START